home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Leonardo the Inventor
/
Leonardo The Inventor (93026)(Broderbund)(Riverdeep)(2004).iso
/
LEOWINMV
/
WORKS.DIR
/
00016_Script_16
< prev
next >
Wrap
Text File
|
1996-03-31
|
634b
|
28 lines
-- NOTE: Change the constant in first line of goBioPage to the first frame of the book
on goBioPage whichPage
sound stop 1
put 3 into firstPage
puppetTransition 2, 2, 16, true
go frame firstPage + whichPage - 1
end goBioPage
on goNearbyBioPage howMany
sound stop 1
if howMany > 0 then
puppetTransition 2, 2, 16, true
else if howMany <0 then
puppetTransition 1, 2, 16, true
end if
go the frame + howMany
end goNearbyBioPage
on pauseFrame
go the frame
end pauseFrame
on printWorks
LeoPrint label("WorksPrintPages"),¼
label("WorksEndPages"), "WORKS.EXE"
end printWorks